← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 16:10:05 2022
Reported on Wed Dec 14 16:12:58 2022

Filename(eval 269)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 66 statements in 154µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
282155µs55µsJSON::Schema::Modern::Document::::metaschema_uri JSON::Schema::Modern::Document::metaschema_uri
1119µs20µsJSON::Schema::Modern::Document::::BEGIN@5.118 JSON::Schema::Modern::Document::BEGIN@5.118
1114µs4µsMethod::Generate::Accessor::_Generated::::BEGIN@10.119Method::Generate::Accessor::_Generated::BEGIN@10.119
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
220s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
310s my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4 package JSON::Schema::Modern::Document;
5238µs231µs
# spent 20µs (9+11) within JSON::Schema::Modern::Document::BEGIN@5.118 which was called: # once (9µs+11µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 20µs making 1 call to JSON::Schema::Modern::Document::BEGIN@5.118 # spent 11µs making 1 call to warnings::unimport
6
# spent 55µs within JSON::Schema::Modern::Document::metaschema_uri which was called 28 times, avg 2µs/call: # 14 times (30µs+0s) by JSON::Schema::Modern::Document::traverse at line 178 of JSON/Schema/Modern/Document.pm, avg 2µs/call # 14 times (25µs+0s) by JSON::Schema::Modern::Document::traverse at line 192 of JSON/Schema/Modern/Document.pm, avg 2µs/call
sub metaschema_uri {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 4µs within Method::Generate::Accessor::_Generated::BEGIN@10.119 which was called: # once (4µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1110s $^H = 1762;
1211µs ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1313µs %^H = (
14 );
15142µs14µs}
16# END quote_sub PRELUDE
172811µs Carp::croak("metaschema_uri is a read-only accessor") if @_ > 1;
182851µs$_[0]->{"metaschema_uri"} }
1911µs $$_UNQUOTED = \&metaschema_uri;
20}
2117µs1;
22
23;